// This file was decompiled using SASCM.ini published on 2020-11-11
{$CLEO .CS}

03A4: script_name "QUADSHOTBUY" 

:QUADSHOTBUY_15
0001: wait 0 ms 
00D6: if and
0256:   player 0 defined 
0ADC:   test_cheat "QUADSHOTBUY" 
004D: jump_if_false @QUADSHOTBUY_15 
00D6: if 
010A:   player $PLAYER_CHAR money > 11499 
004D: jump_if_false @QUADSHOTBUY_301 
0001: wait 0 ms 
0208: 3@ = random_float_in_ranges -7.0 10.0 
0208: 4@ = random_float_in_ranges -10.0 7.0 
04C4: store_coords_to $X $Y $Z from_actor $PLAYER_ACTOR with_offset 3@ 4@ -1.0 
0107: $OBJECAT = create_object 1224 at $X $Y $Z 
0382: set_object $OBJECAT collision_detection 1 
0400: store_coords_to $X2 $Y2 $Z2 from_object $OBJECAT with_offset 0.0 0.0 0.0 
0213: $QUADSHOTSG = create_pickup 12404 type 3 at $X2 $Y2 $Z2 
03DC: $QUADSHOTSGM = create_marker_above_pickup $QUADSHOTSG 

:QUADSHOTBUY_207
0001: wait 0 ms 
00D6: if 
0214:   pickup $QUADSHOTSG picked_up 
004D: jump_if_false @QUADSHOTBUY_207 
0002: jump @QUADSHOTBUY_234 

:QUADSHOTBUY_234
0247: load_model 12404 
038B: load_requested_models 
0001: wait 0 ms 
00D6: if 
0248:   model 12404 available 
004D: jump_if_false @QUADSHOTBUY_234 
01B2: give_actor $PLAYER_ACTOR weapon 74 ammo 38 // Load the weapon model before using this 
0002: jump @QUADSHOTBUY_277 

:QUADSHOTBUY_277
0001: wait 0 ms 
0109: player $PLAYER_CHAR money += -11500 
01C4: remove_references_to_object $OBJECAT // This object will now disappear when the player looks away 
0002: jump @QUADSHOTBUY_15 

:QUADSHOTBUY_301
0001: wait 0 ms 
0512: show_permanent_text_box 'NOMONEY' 
0001: wait 2000 ms 
03E6: remove_text_box 
0002: jump @QUADSHOTBUY_15 
